#!/usr/bin/perl

use CGI qw(:standard);
use XML::Simple;

print header(-type => 'application/xhtml+xml');

my $xml = XMLin("quiniela.xml");
XMLin("quiniela.xml");
print XMLout($xml ,RootName=>'quiniela', NoAttr=>1, XMLDecl =>'<?xml version="1.0"?>');
